home *** CD-ROM | disk | FTP | other *** search
/ QuickTime 2.0 Developer Kit / QuickTime 2.0 Developer Kit.iso / mac / MAC / Programming Stuff / Documentation / develop / develop Issue 20 / develop 20 code / QTTextSample / QuicktimeUtils.c < prev    next >
Encoding:
Text File  |  1994-10-14  |  3.6 KB  |  141 lines  |  [TEXT/MPCC]
  1. // Text Media Sample Code - QuickTime routines
  2. //
  3. // This file contains general purpose QuickTime and Utility routines
  4. //
  5. // sample to show how to do searches with text media, and how to use
  6. // a simple text proc to get the text (without the style info) out and
  7. // to display it in a window.
  8. //
  9. // This is something of a work in progress, it contains a few bugs, if you find
  10. // anthing that you feel needs fixing, or explaing, please let me know
  11. // AppleLink: NICKT
  12. //
  13. // Modification History
  14. //
  15. //    10/13/94    nick    First cut - factored code out from other files 
  16. //
  17. //    Copyright:    © 1992-4 by Apple Computer, Inc.
  18.  
  19.  
  20.  
  21. #include "QuickTimeUtils.h"
  22.  
  23. //---------------------------------------------------------------------
  24.  
  25. void     CheckError(OSErr error, Str255 displayString)
  26. {
  27.     // hacky error handler.  It's good to check errors, but this is not
  28.     // really the best way to do it - checking should be more forgiving
  29.     // and the way we are handling errors here is to just quit.
  30.     
  31.     // also this way of doing things uses hardwired strings.  This is bad 
  32.     // because it makes localisation tough to do.
  33.  
  34.     Str255        theErrorAsString ;
  35.     
  36.     if (error == noErr) return;
  37.  
  38.     NumToString( error, theErrorAsString ) ;
  39.     ParamText( displayString, theErrorAsString, "\p", "\p" ) ;
  40.     (void)StopAlert( 130, nil ) ;
  41.  
  42.     ExitToShell();
  43. }
  44.  
  45. //---------------------------------------------------------------------
  46. // Check to see if a window belongs to a desk accessory.
  47.  
  48. Boolean IsDAWindow(WindowPtr window)
  49. {
  50.     if ( window == nil )
  51.         return false;
  52.     else    // DA windows have negative windowKinds
  53.         return ((WindowPeek) window)->windowKind < 0;
  54. } 
  55.  
  56. //---------------------------------------------------------------------
  57.  
  58. Boolean IsQuickTimeInstalled (void) 
  59. {
  60.     short        error;
  61.     long        result;
  62.     
  63.     error = Gestalt (gestaltQuickTime, &result);
  64.     return (error == noErr);
  65. }
  66.  
  67. //---------------------------------------------------------------------
  68.  
  69. OSErr DoPrerollMovie( Movie    aMovie ) 
  70. {
  71.     TimeValue         aTimeValue ;
  72.     TimeValue         movieDur ;
  73.     Fixed             preferredRate ;
  74.     OSErr            theErr = noErr ;
  75.  
  76.     aTimeValue = GetMovieTime(aMovie, nil);
  77.     movieDur = GetMovieDuration(aMovie);
  78.     preferredRate = GetMoviePreferredRate(aMovie);
  79.  
  80.     if (aTimeValue == movieDur) 
  81.         aTimeValue = 0;
  82.         
  83.     theErr = PrerollMovie(aMovie, aTimeValue, preferredRate);
  84.  
  85.     return theErr ;
  86. }
  87.  
  88. //---------------------------------------------------------------------
  89.  
  90. Boolean    IsPointInMovieController( MovieController    aController, WindowPtr whichWindow, Point where)
  91. {
  92.     RgnHandle        rgn ;
  93.     Boolean            result = false ;
  94.     
  95.     rgn = MCGetWindowRgn( aController, whichWindow ) ;
  96.     if( rgn != nil ) {
  97.         result = PtInRgn( where, rgn ) ;
  98.         DisposeRgn( rgn ) ;
  99.     }
  100.     return result ;
  101. }
  102.  
  103. //---------------------------------------------------------------------
  104. // locate the first track in a movie with the supplied type
  105. Track    GetFirstTrackOfType( Movie    aMovie, OSType    trackType )
  106. {
  107.     Track     theTrack  = nil ; 
  108.     OSType     mediaType;
  109.     short    trackCount ;
  110.     short    index ;
  111.     
  112.     trackCount = GetMovieTrackCount(aMovie);
  113.     for ( index=1 ; index <= trackCount ; index++) {
  114.         Track t = GetMovieIndTrack(aMovie, index);
  115.  
  116.         GetMediaHandlerDescription(GetTrackMedia(t), &mediaType, nil, nil);
  117.         if (mediaType == trackType) {
  118.             theTrack = t;
  119.             break;
  120.         }
  121.     }
  122.  
  123.     return theTrack ;
  124.  
  125. }
  126.  
  127. //-----------------------------------------------------------------------
  128. // put up standard file - return true if we choose a movie
  129.  
  130. Boolean    GetAMovieFileSpec (FSSpec *theFile)
  131. {
  132.     SFTypeList                     typeList = {MovieFileType,0,0,0};
  133.     StandardFileReply            reply;
  134.  
  135.     StandardGetFilePreview (nil, 1, typeList, &reply);
  136.     if (reply.sfGood) {
  137.         *theFile = reply.sfFile ;
  138.     }
  139.     return reply.sfGood;
  140. }
  141.